home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 10 / The PC-Sig Library - Shareware for the IBM PC and Compatibles (PC-SIG)(Tenth Edition Disks 1-2804)(1991).iso / PC_SIGCD / 17 / 2 / DISK1720.ZIP / HYPMAIN.LZH / CAI.HYP < prev    next >
Text File  |  1991-04-24  |  6KB  |  363 lines
  1. .REMARK
  2. Computer Aided Instruction demo
  3.  
  4. This demonstrates the questioning part of CAI only.
  5. Normally there would be instructional frames followed
  6. by questions, with return to the instructions if answers
  7. are incorrect.
  8.  
  9. There are many other ways of handling CAI, including use of
  10. selection from graphic images, selection of answer using mouse,
  11. and rapid progress routes when scoring is high.
  12. .SCRIPT RESET
  13. VT0
  14. VC0
  15. VW0
  16. VF4;Y Number of frames
  17. VO0
  18. VQ4
  19. Va--------;Vb--------;Vc--------
  20. .SCRIPT SETUP
  21. VS&C59
  22. VN~g        ~APress space for next question~PZL1x$SF+~K ~E
  23. .REMARK
  24. This script allows 5 seconds to choose an answer
  25. then times out. It tallies timeouts, correct and wrong answers.
  26. It then waits for 5 seconds or key press before next question.
  27. Note .5 second catch for key presses just after the timeout.
  28. .SCRIPT Choose
  29. VR&G500;jbTIMEOUT
  30. vR$\;jnWRONG
  31. VMCORRECT - Well done~g
  32. VC=C+1
  33. JNEXT
  34. LTIMEOUT
  35. VMOut of time
  36. VT=T+1
  37. JPMESS
  38. LWRONG
  39. VW=W+1
  40. VMWrong
  41. LPMESS
  42. VM$M - the answer was number $\~g
  43. LNEXT
  44. ZL1
  45. .SCRIPT Timing
  46. Y&H
  47. VR&K
  48. VT&J;VO=O+T
  49. vR$\;jnWRONG
  50. VMCORRECT - Well done~g
  51. VC=C+1
  52. JNEXT
  53. LWRONG
  54. VW=W+1
  55. VMWrong
  56. LPMESS
  57. VM$M - the answer was number $\~g
  58. LNEXT
  59. ZL1
  60. .SCRIPT check
  61. ZX20;ZY18
  62. vawent;jeOK1
  63. P$a is incorrect
  64. Vawent
  65. LOK1
  66. vbbought;jeOK2
  67. P$b is incorrect
  68. Vbbought
  69. LOK2
  70. vcprice;jeOK3
  71. P$c is incorrect
  72. Vcprice
  73. LOK3
  74. y
  75. .
  76. .FRAME MENU
  77. .TITLE Select type
  78.  
  79. [1]    1.    ~FMultiple choice with timeout~PFTimeout~K1~E
  80.  
  81. [2]    2.    ~FMultiple choice with timing~PFTiming~K2~E
  82.  
  83. [3]    3.    ~FGap filling~K3~E
  84.  
  85. [4]    4.    ~FChoice in line~K4~E
  86.  
  87.  
  88. [q]    q.    ~FQuit~PQ~Kq~E
  89.  
  90. ~A~PSRESET~E~Q
  91. .FRAME Timeout
  92. .TITLE Multiple choice with timeout
  93.  
  94.     This set of frames illustrates the multiple choice
  95.     form of questioning, with timeouts on the response.
  96.     5 seconds are given to answer each question.
  97.  
  98.     Scores are tallied for:-
  99.  
  100.     Correct answers
  101.     Wrong answers
  102.     Timeouts
  103.  
  104.     And a percentage and rating are given
  105.  
  106. [ ]    ~APress space to start~PF+~K ~E
  107. .FRAME Question 1
  108. .TITLE Hard
  109.  
  110.     What is an ECHIDNA
  111.  
  112.     1. A kind of rare plant
  113.  
  114.     2. A cast iron fireplace
  115.  
  116.     3. A part of the body
  117.  
  118.     4. A relative of the duck billed platypus
  119.  
  120. ~h1    $M
  121. ~h1    An Echidna, or spiny ant eater, is an egg laying mammal
  122. ~h1    related to the duck-billed platypus, or Ornitherinchus
  123. ~h1    $N
  124. ~A~PSchoose(4)~E~Q
  125. .
  126. .FRAME Question 2
  127. .TITLE Easy
  128.  
  129.     How many buns in a bakers dozen
  130.  
  131.     1. 11
  132.  
  133.     2. 12
  134.  
  135.     3. 13
  136.  
  137.     4. 24
  138.  
  139. ~h1    $M
  140. ~h1    A bakers dozen is named after the old practise of
  141. ~h1    bakers giving an extra bun with each dozen.
  142. ~h1    $N
  143. ~A~PSchoose(3)~E~Q
  144. .
  145. .FRAME Question 3
  146. .TITLE Hard
  147.  
  148.     Where is Egypt
  149.  
  150.     1. Near Bradford
  151.  
  152.     2. South of Kensington
  153.  
  154.     3. In Mid Glamorgan
  155.  
  156.     4. Just outside Edinburgh
  157.  
  158. ~h1    $M
  159. ~h1    There are a number of small villages to the west of
  160. ~h1    Bradford in West Yorkshire with names such as Egypt
  161. ~h1    and Jericho. At Jericho there is a cutting with high
  162. ~h1    walls, known as 'the walls of Jericho'.
  163. ~h1    $N
  164. ~A~PSchoose(1)~E~Q
  165. .
  166. .FRAME Question 4
  167. .TITLE Hard
  168.  
  169.     What does the &K function do
  170.  
  171.     1. Return a key mapping
  172.  
  173.     2. Return the key pressed at a prompt
  174.  
  175.     3. Kill the program
  176.  
  177.     4. Return the memory available as K bytes
  178.  
  179. ~h1    $M
  180. ~h1    The &K function issues a popup prompt, and
  181. ~h1    returns the character for the key pressed in response.
  182. ~h1    $N
  183. ~A~PSchoose(2)~E~Q
  184. .
  185. .FRAME Report 1
  186. .TITLE How well did you do
  187.  
  188.     Number of questions - $F
  189.  
  190.     Number of correct answers - $C
  191.  
  192.     Number of incorrect answers - $W
  193.  
  194.     Number of timeouts - $T
  195. ~A~Psscore~E~Q
  196. [ ]    ~APress space to return to main menu~PFMENU~K ~E
  197. .
  198. .SCRIPT score
  199. VP=C*100/F
  200. vP25;jlBAD
  201. vP50;jlAVERAGE
  202. vP75;jlGOOD
  203. VGBrilliant
  204. JDISP
  205. LBAD
  206. VGPretty aweful
  207. JDISP
  208. LAVERAGE
  209. VGAverage
  210. JDISP
  211. LGOOD
  212. VGVery good
  213. LDISP
  214. pYou scored $P percent correct - That's $G
  215. .
  216. .FRAME Timing
  217. .TITLE Multiple choice with timing
  218.  
  219.     This example shows how multiple choice with timing
  220.     of responses can be handled.
  221.  
  222.  
  223. [ ]    ~APress space to start~PF+~K ~E
  224. .
  225. .FRAME Q 1
  226. .TITLE Example
  227.  
  228.     What is 2 times 3 plus 7
  229.  
  230.     1.    13
  231.  
  232.     2.    20
  233.  
  234.     3.    17
  235.  
  236. ~h1    $M
  237. ~h1    3 times 2 = 6, plus 7 = 13
  238. ~h1    $N
  239. ~A~PSTiming(1)~E~Q
  240. .
  241. .FRAME Q 2
  242. .TITLE Example
  243.  
  244.     What is 7 times 11 plus 4
  245.  
  246.     1.    79
  247.  
  248.     2.    81
  249.  
  250.     3.    75
  251.  
  252. ~h1    $M
  253. ~h1    7 times 11 = 77, plus 4 = 81
  254. ~h1    $N
  255. ~A~PSTiming(2)~E~Q
  256. .
  257. .FRAME Q 3
  258. .TITLE Example
  259.  
  260.     What is 9 times 9 plus 9
  261.  
  262.     1.    99
  263.  
  264.     2.    87
  265.  
  266.     3.    90
  267.  
  268. ~h1    $M
  269. ~h1    9 times 9 = 81, plus 9 = 90
  270. ~h1    $N
  271. ~A~PSTiming(3)~E~Q
  272. .
  273. .FRAME Q 4
  274. .TITLE Example
  275.  
  276.     What is 11 times 11 plus 7
  277.  
  278.     1.    127
  279.  
  280.     2.    128
  281.  
  282.     3.    129
  283.  
  284. ~h1    $M
  285. ~h1    11 times 11 = 121, plus 7 = 128
  286. ~h1    $N
  287. ~A~PSTiming(2)~E~Q
  288. .
  289. .FRAME Report 2
  290. .TITLE Timing report
  291.  
  292.     Number of questions    $Q
  293.  
  294.     Number correct        $C
  295.  
  296.     Number wrong        $W
  297.  
  298.     Average response time    $A seconds
  299. ~A~Pscalc~E~Q
  300.  
  301. [ ]    ~APress space to return to main menu~PFMENU~K ~E
  302. .
  303. .REMARK
  304. Calculate average response in seconds / hundredths
  305. .SCRIPT calc
  306. VA=O/Q
  307. VB=A/100
  308. VA=A-B*100
  309. vA10;alVA0$A
  310. VA$B.$A
  311. y
  312. .
  313. .FRAME Gap Filling
  314. .TITLE Fill in the gaps
  315. ~A~PZX1;ZY1;I~E~Q 
  316.     Fill in the missing words.
  317.  
  318.     Yesterday I ~I$a~W10~PVa%s;I~E shopping and ~I$b~W10~PVb%s;I~E a
  319.  
  320.     shirt. The ~I$c~W10~PVc%s;Scheck~E of the shirt was 25 pounds.
  321.  
  322.  
  323.  
  324. [ ]    ~APress space to return to main menu~PFMENU~K ~E
  325. .
  326. .FRAME Choice in line
  327. .TITLE Fill in the gaps
  328. ~A~PZX1;ZY1~E~Q 
  329.     Fill the missing words by selecting from menus
  330.         select menu for line with keys 1,2 and 3.
  331.  
  332. [1]    Yesterday I ~A$a~PZX70;Va@mline 1;y~K1~E shopping
  333.  
  334. [2]       and ~A$b~PZX70;Vb@mline 2;y~K2~E a shirt.
  335.  
  336. [3]    The ~A$c~PZX70;Vc@mline 3;y~K3~E of the shirt was 25 pounds.
  337.  
  338.  
  339. [c]    ~APress 'c' to check answer~PScheck~Kc~E
  340.  
  341. [ ]    ~APress space to return to main menu~PFMENU~K ~E
  342. .
  343. .MENU Line 1
  344. will go
  345. went
  346. go
  347. whent
  348. was
  349. .MENU Line 2
  350. bort
  351. buyed
  352. sold
  353. bought
  354. buy
  355. .MENU Line 3
  356. size
  357. price
  358. wrapping
  359. pay
  360. box
  361. label
  362. .
  363.